Шаг 102 - Изучаем XBase– Пишем реквизит справочника.

Мы получали наименование. Но нам нечего не стоит и реквизит записать. Просто нужно использовать его имя и создать поле.

Процедура Сформировать() 
	
	ДБФ =  СоздатьОбъект("XBase");
	ДБФ.ДобавитьПоле("NAME", "S", 25,0);
	ДБФ.ДобавитьПоле("INN", "S", 10,0);
    	ДБФ.СоздатьФайл("c:\Test.dbf");



	Спр = СоздатьОбъект("Справочник.Номенклатура");
	Спр.ВыбратьЭлементы();  
	
	Пока Спр.ПолучитьЭлемент()>0 Цикл
	  ДБФ.Добавить();
          ДБФ.NAME=Спр.Наименование;
 	  ДБФ.INN=Спр.ИНН;
	  ДБФ.Записать();
	КонецЦикла;
	
	ДБФ.ЗакрытьФайл();
	
КонецПроцедуры

Запустим и посмотрим.

102_1.gif (3462 b)

Записался. Только проследите, что бы реквизит все таки был в справочнике.

Hosted by uCoz